home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / directconnect_hub.nasl < prev    next >
Text File  |  2005-03-31  |  1KB  |  53 lines
  1. #  This script was written by David Maciejak <david dot maciejak at kyxar dot fr>
  2. # This script is released under the GNU GPLv2
  3.  
  4. if(description)
  5. {
  6.   script_id(13751);
  7.   script_version ("$Revision: 1.3 $");
  8.  
  9.   script_name(english:"DirectConnect hub detection");
  10.  
  11.   desc["english"] = "
  12. DirectConnect hub is running on this port. This peer to peer 
  13. software is used to share files, and allow many clients to
  14. connect through.
  15.  
  16. Risk factor : Medium";
  17.  
  18.   script_description(english:desc["english"]);
  19.  
  20.   summary["english"] = "DirectConnect hub detection";
  21.   script_summary(english:summary["english"]);
  22.  
  23.   script_category(ACT_GATHER_INFO);
  24.  
  25.   script_copyright(english:"This script is Copyright (C) 2004 David Maciejak");
  26.   family["english"] = "Peer-To-Peer File Sharing";
  27.   script_family(english:family["english"]);
  28.   script_dependencie("find_service2.nasl");
  29.   script_require_ports(411);
  30.  
  31.   exit(0);
  32. }
  33.  
  34. include("misc_func.inc");
  35.  
  36. port=411;
  37. if(get_port_state(port))
  38. {
  39.       soc = open_sock_tcp(port);
  40.      if(soc)
  41.      {
  42.         r=recv_line(socket:soc, length:1024);
  43.         if ( ! r ) exit(0);
  44.         if (ereg(pattern:"^\$Lock .+ Pk=.+",string:r))
  45.         {
  46.             str="$quit|";
  47.             send(socket:soc,data:str);
  48.             security_warning(port);
  49.         }
  50.         close(soc);
  51.      }
  52. }
  53.